Win 50 Game+ Vol. 7 (Japan)/Win 50 Game+ Vol. 7 (Japan).7z/Win 50 Game+ Vol. 7 (Japan).bin/games/sheep11/sh11src.lzh/MGMAIN.DFM/MGMAIN.txt

Text File | 1996-05-30 | 3KB | 137 lines

object Form1: TForm1
  Left = 193
  Top = 190
  Width = 408
  Height = 396
  Caption = 'ShepheldBoy 1.1'
  Color = clGreen
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  PixelsPerInch = 96
  Position = poDefaultPosOnly
  Scaled = False
  OnCreate = FormCreate
  OnMouseMove = FormMouseMove
  OnResize = FormResize
  TextHeight = 18
  object MainMenu1: TMainMenu
    Left = 48
    Top = 32
    object Game1: TMenuItem
      Caption = '&Game'
      object New1: TMenuItem
        Caption = '&New'
        OnClick = New1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      object Speed1: TMenuItem
        Caption = 'S&peed'
        object Slow1: TMenuItem
          Tag = 3
          Caption = '&Slow'
          OnClick = speedClick
        end
        object Mid1: TMenuItem
          Tag = 6
          Caption = '&Mid'
          Checked = True
          OnClick = speedClick
        end
        object Fast1: TMenuItem
          Tag = 8
          Caption = '&Fast'
          OnClick = speedClick
        end
        object Veryfast1: TMenuItem
          Tag = 13
          Caption = '&Veryfast'
          OnClick = speedClick
        end
      end
      object Sheep1: TMenuItem
        Caption = '&Sheep'
        object N20sheep1: TMenuItem
          Tag = 20
          Caption = '&20 sheep'
          OnClick = sheepClick
        end
        object N30sheep1: TMenuItem
          Tag = 30
          Caption = '&30 sheep'
          Checked = True
          OnClick = sheepClick
        end
        object N50sheep1: TMenuItem
          Tag = 50
          Caption = '&50 sheep'
          OnClick = sheepClick
        end
        object N100sheep1: TMenuItem
          Tag = 100
          Caption = '1&00 sheep'
          OnClick = sheepClick
        end
      end
      object Timer2: TMenuItem
        Caption = 'Timer'
        GroupIndex = 9
        object N60sec1: TMenuItem
          Tag = 1159
          Caption = '&60 sec'
          OnClick = timeClick
        end
        object N120sec1: TMenuItem
          Tag = 2299
          Caption = '1&20 sec'
          Checked = True
          OnClick = timeClick
        end
        object N180sec1: TMenuItem
          Tag = 3439
          Caption = '1&80 sec'
          OnClick = timeClick
        end
        object N300sec1: TMenuItem
          Tag = 5719
          Caption = '&300 sec'
          OnClick = timeClick
        end
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object Index1: TMenuItem
        Caption = '&Index'
        OnClick = Index1Click
      end
      object About1: TMenuItem
        Caption = '&About'
        OnClick = About1Click
      end
    end
    object Score1: TMenuItem
      Caption = '0/0 T:120'
      GroupIndex = 9
    end
  end
  object Timer1: TTimer
    Interval = 50
    OnTimer = Timer1Timer
    Left = 48
    Top = 72
  end
end